MsgBox""&chr(10)&"",32,""

来源:百度知道 编辑:UC知道 时间:2024/05/18 01:43:05
MsgBox""&chr(10)&"",2,""
如何在出现的确定中止忽略
后面添加内容呢.
比如确定.弹出某窗口什么的。
请举例

Private Sub Form_Load()
a = MsgBox("aa", vbAbortRetryIgnore, "a")
If a = 3 Then
Text1.Text = "终止"
End If
If a = 4 Then
Text1.Text = "重试"
End If
If a = 5 Then
Text1.Text = "忽略"
End If
End Sub

MSGBOX函数有返回值,确定的返回值是 1,取消为2,终止为3,重试为4,忽略为5,是 为 6,否 为7

创建模式窗口